home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 June: Reference Library / Dev.CD Jun 95 / Dev.CD Jun 95.toast / What's New? / Tool Chest / Interfaces / UniversalInterfaces 2.1B1 / AIncludes / CMConversions.a < prev    next >
Encoding:
Text File  |  1995-04-18  |  5.7 KB  |  278 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        CMConversions.a
  3. ;
  4. ;    Contains:    ColorSync base <-> derived color space conversion Component interface
  5. ;
  6. ;    Version:    Technology:    ColorSync 2.0
  7. ;                Package:    Universal Interfaces 2.1ß1 in “MPW Prerelease” on ETO #17
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__CMCONVERSIONS__') = 'UNDEFINED' THEN
  21. __CMCONVERSIONS__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28.  
  29.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  30.     include 'Components.a'
  31.     ENDIF
  32. ;        include 'MixedMode.a'                                        ;
  33.  
  34.     IF &TYPE('__CMAPPLICATION__') = 'UNDEFINED' THEN
  35.     include 'CMApplication.a'
  36.     ENDIF
  37. ;        include 'Quickdraw.a'                                        ;
  38. ;            include 'QuickdrawText.a'                                ;
  39. ;        include 'Files.a'                                            ;
  40. ;            include 'OSUtils.a'                                    ;
  41. ;                include 'Memory.a'                                    ;
  42. ;        include 'Printing.a'                                        ;
  43. ;            include 'Errors.a'                                        ;
  44. ;            include 'Dialogs.a'                                    ;
  45. ;                include 'Windows.a'                                ;
  46. ;                    include 'Events.a'                                ;
  47. ;                    include 'Controls.a'                            ;
  48. ;                        include 'Menus.a'                            ;
  49. ;                include 'TextEdit.a'                                ;
  50. ;        include 'CMICCProfile.a'                                    ;
  51.  
  52. CMConversionInterfaceVersion    EQU        1
  53.  
  54. ; Component function selectors 
  55. kCMXYZToLab                        EQU        0
  56. kCMLabToXYZ                        EQU        1
  57. kCMXYZToLuv                        EQU        2
  58. kCMLuvToXYZ                        EQU        3
  59. kCMXYZToYxy                        EQU        4
  60. kCMYxyToXYZ                        EQU        5
  61. kCMRGBToHLS                        EQU        6
  62. kCMHLSToRGB                        EQU        7
  63. kCMRGBToHSV                        EQU        8
  64. kCMHSVToRGB                        EQU        9
  65. kCMRGBToGRAY                    EQU        10
  66. kCMXYZToFixedXYZ                EQU        11
  67. kCMFixedXYZToXYZ                EQU        12
  68.  
  69. ;
  70. ; pascal ComponentResult CMXYZToLab(ComponentInstance ci, const CMColor *src, const CMXYZColor *white, CMColor *dst, unsigned long count)
  71. ;
  72.     IF ¬ GENERATINGCFM THEN
  73.         Macro
  74.         _CMXYZToLab
  75.             dc.w     $2F3C
  76.             dc.w     $0010
  77.             dc.w     $0000
  78.             moveq    #0,d0
  79.             dc.w     $A82A
  80.         EndM
  81.     ELSE
  82.         IMPORT_CFM_FUNCTION    CMXYZToLab
  83.     ENDIF
  84.  
  85. ;
  86. ; pascal ComponentResult CMLabToXYZ(ComponentInstance ci, const CMColor *src, const CMXYZColor *white, CMColor *dst, unsigned long count)
  87. ;
  88.     IF ¬ GENERATINGCFM THEN
  89.         Macro
  90.         _CMLabToXYZ
  91.             dc.w     $2F3C
  92.             dc.w     $0010
  93.             dc.w     $0001
  94.             moveq    #0,d0
  95.             dc.w     $A82A
  96.         EndM
  97.     ELSE
  98.         IMPORT_CFM_FUNCTION    CMLabToXYZ
  99.     ENDIF
  100.  
  101. ;
  102. ; pascal ComponentResult CMXYZToLuv(ComponentInstance ci, const CMColor *src, const CMXYZColor *white, CMColor *dst, unsigned long count)
  103. ;
  104.     IF ¬ GENERATINGCFM THEN
  105.         Macro
  106.         _CMXYZToLuv
  107.             dc.w     $2F3C
  108.             dc.w     $0010
  109.             dc.w     $0002
  110.             moveq    #0,d0
  111.             dc.w     $A82A
  112.         EndM
  113.     ELSE
  114.         IMPORT_CFM_FUNCTION    CMXYZToLuv
  115.     ENDIF
  116.  
  117. ;
  118. ; pascal ComponentResult CMLuvToXYZ(ComponentInstance ci, const CMColor *src, const CMXYZColor *white, CMColor *dst, unsigned long count)
  119. ;
  120.     IF ¬ GENERATINGCFM THEN
  121.         Macro
  122.         _CMLuvToXYZ
  123.             dc.w     $2F3C
  124.             dc.w     $0010
  125.             dc.w     $0003
  126.             moveq    #0,d0
  127.             dc.w     $A82A
  128.         EndM
  129.     ELSE
  130.         IMPORT_CFM_FUNCTION    CMLuvToXYZ
  131.     ENDIF
  132.  
  133. ;
  134. ; pascal ComponentResult CMXYZToYxy(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  135. ;
  136.     IF ¬ GENERATINGCFM THEN
  137.         Macro
  138.         _CMXYZToYxy
  139.             dc.w     $2F3C
  140.             dc.w     $000C
  141.             dc.w     $0004
  142.             moveq    #0,d0
  143.             dc.w     $A82A
  144.         EndM
  145.     ELSE
  146.         IMPORT_CFM_FUNCTION    CMXYZToYxy
  147.     ENDIF
  148.  
  149. ;
  150. ; pascal ComponentResult CMYxyToXYZ(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  151. ;
  152.     IF ¬ GENERATINGCFM THEN
  153.         Macro
  154.         _CMYxyToXYZ
  155.             dc.w     $2F3C
  156.             dc.w     $000C
  157.             dc.w     $0005
  158.             moveq    #0,d0
  159.             dc.w     $A82A
  160.         EndM
  161.     ELSE
  162.         IMPORT_CFM_FUNCTION    CMYxyToXYZ
  163.     ENDIF
  164.  
  165. ;
  166. ; pascal ComponentResult CMRGBToHLS(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  167. ;
  168.     IF ¬ GENERATINGCFM THEN
  169.         Macro
  170.         _CMRGBToHLS
  171.             dc.w     $2F3C
  172.             dc.w     $000C
  173.             dc.w     $0006
  174.             moveq    #0,d0
  175.             dc.w     $A82A
  176.         EndM
  177.     ELSE
  178.         IMPORT_CFM_FUNCTION    CMRGBToHLS
  179.     ENDIF
  180.  
  181. ;
  182. ; pascal ComponentResult CMHLSToRGB(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  183. ;
  184.     IF ¬ GENERATINGCFM THEN
  185.         Macro
  186.         _CMHLSToRGB
  187.             dc.w     $2F3C
  188.             dc.w     $000C
  189.             dc.w     $0007
  190.             moveq    #0,d0
  191.             dc.w     $A82A
  192.         EndM
  193.     ELSE
  194.         IMPORT_CFM_FUNCTION    CMHLSToRGB
  195.     ENDIF
  196.  
  197. ;
  198. ; pascal ComponentResult CMRGBToHSV(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  199. ;
  200.     IF ¬ GENERATINGCFM THEN
  201.         Macro
  202.         _CMRGBToHSV
  203.             dc.w     $2F3C
  204.             dc.w     $000C
  205.             dc.w     $0008
  206.             moveq    #0,d0
  207.             dc.w     $A82A
  208.         EndM
  209.     ELSE
  210.         IMPORT_CFM_FUNCTION    CMRGBToHSV
  211.     ENDIF
  212.  
  213. ;
  214. ; pascal ComponentResult CMHSVToRGB(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  215. ;
  216.     IF ¬ GENERATINGCFM THEN
  217.         Macro
  218.         _CMHSVToRGB
  219.             dc.w     $2F3C
  220.             dc.w     $000C
  221.             dc.w     $0009
  222.             moveq    #0,d0
  223.             dc.w     $A82A
  224.         EndM
  225.     ELSE
  226.         IMPORT_CFM_FUNCTION    CMHSVToRGB
  227.     ENDIF
  228.  
  229. ;
  230. ; pascal ComponentResult CMRGBToGray(ComponentInstance ci, const CMColor *src, CMColor *dst, unsigned long count)
  231. ;
  232.     IF ¬ GENERATINGCFM THEN
  233.         Macro
  234.         _CMRGBToGray
  235.             dc.w     $2F3C
  236.             dc.w     $000C
  237.             dc.w     $000A
  238.             moveq    #0,d0
  239.             dc.w     $A82A
  240.         EndM
  241.     ELSE
  242.         IMPORT_CFM_FUNCTION    CMRGBToGray
  243.     ENDIF
  244.  
  245. ;
  246. ; pascal ComponentResult CMXYZToFixedXYZ(ComponentInstance ci, const CMXYZColor *src, CMFixedXYZColor *dst, unsigned long count)
  247. ;
  248.     IF ¬ GENERATINGCFM THEN
  249.         Macro
  250.         _CMXYZToFixedXYZ
  251.             dc.w     $2F3C
  252.             dc.w     $000C
  253.             dc.w     $000B
  254.             moveq    #0,d0
  255.             dc.w     $A82A
  256.         EndM
  257.     ELSE
  258.         IMPORT_CFM_FUNCTION    CMXYZToFixedXYZ
  259.     ENDIF
  260.  
  261. ;
  262. ; pascal ComponentResult CMFixedXYZToXYZ(ComponentInstance ci, const CMFixedXYZColor *src, CMXYZColor *dst, unsigned long count)
  263. ;
  264.     IF ¬ GENERATINGCFM THEN
  265.         Macro
  266.         _CMFixedXYZToXYZ
  267.             dc.w     $2F3C
  268.             dc.w     $000C
  269.             dc.w     $000C
  270.             moveq    #0,d0
  271.             dc.w     $A82A
  272.         EndM
  273.     ELSE
  274.         IMPORT_CFM_FUNCTION    CMFixedXYZToXYZ
  275.     ENDIF
  276.  
  277.     ENDIF ; __CMCONVERSIONS__
  278.